perm filename XXX[MUS,LCS] blob sn#088118 filedate 1974-02-19 generic text, type T, neo UTF8
06500	XOPEN:	MOVSI	'XGP'	;DOWN TO XGPOK FOR XGP CONFLICT.
06600		DEVUSE	0,	
06700		HLRZ 	0,0
06800		CAIN	400000
06900		JRST	XGPOK
07000		INIT	16,17
07100		SIXBIT	.XGP.
07200		0
07300		JRA	16,2(16)
07400	XGPOK:	OPEN	ADCHN,[117 	;MODE
10600		RELEASE 16,